


#usage of controle statements

$i = 1;   #while loop  
while ($i<=10) {
 
   print "$i\n"; 
   $i++; 

} 
   #for loop

for ($i=1;$i<=10;$i++) { 
    print "$i\n"; 
} 
 
#foreach loop


foreach $i (1,2,3,4,5,6,7,8,9,10) { 
    print "$i\n"; 
}
